home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / Add-Ons / Excel / ExcelTalk / XLCanSpeak.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-09-03  |  363 b   |  20 lines  |  [TEXT/KAHL]
  1.  
  2. #include     "Traps.h"
  3. #include    "Sound.h"
  4. #include    "Speech.h"
  5. #include    "xlcall.h"
  6. #include    "GestaltEqu.h"
  7.  
  8. //SpeechAvailable
  9.  
  10. pascal Boolean main (void) {
  11.     OSErr            err;
  12.     long            result;
  13.     err = Gestalt(gestaltSpeechAttr, &result);
  14. //    return (Ptr)&result;
  15.     if ((err != noErr) || !(result & 
  16.             (1 << gestaltSpeechMgrPresent)))
  17.         return FALSE;
  18.     else
  19.         return TRUE;
  20. }